home *** CD-ROM | disk | FTP | other *** search
/ Atari Mega Archive 1 / Atari Mega Archive - Volume 1.iso / language / isetl.arc / insert.t < prev    next >
Text File  |  1987-08-20  |  299b  |  19 lines
  1. %+ [1..10] = 55;
  2. %+ [] = OM;
  3. 5 %+ [1..10] = 60;
  4. 5 %+ [] = 5;
  5. %max [1,5,2,7,3] = 7;
  6. %max [] = OM;
  7. 6 %max [1,5,2,7,3] = 7;
  8. 6 %max [] = 6;
  9. 10 %max [1,5,2,7,3] = 10;
  10.  
  11. minus := func(a,b); return a-b; end;
  12. minus(4,1) = 3;
  13.  
  14. %minus [10,4,2,1] = 3;
  15. %minus [] = OM;
  16. 10 %minus [4,2,1] = 3;
  17. 10 %minus [] = 10;
  18.  
  19.